home *** CD-ROM | disk | FTP | other *** search
/ Technotools / Technotools (Chestnut CD-ROM)(1993).ISO / lang_c / ucturbo2 / testsnd.c < prev    next >
Text File  |  1987-05-17  |  833b  |  38 lines

  1. main()
  2. {
  3.    cls();
  4.    printf("\n\nSound testing program!\n\n\n");
  5.  
  6.    printf("Sound a tone\n");
  7.    ctone(1000, 500);
  8.    printf("Sound another tone\n");
  9.    ctone(500, 1000);
  10.  
  11.    printf("Here is a red alert \n");
  12.    redalert();
  13.  
  14.    printf("Here is a broad spectrum white noise\n");
  15.    wnoise(100,3000, 9500);
  16.    printf("burble using 200, 300\n");
  17.    burble(200,300);
  18.    printf("burble using 400, 500\n");
  19.    burble(400, 500);
  20.    printf("high frequency white noise\n");
  21.    wnoise(1000, 1500, 9500);
  22.    printf("low frequency white noise\n");
  23.    wnoise(100, 400, 9500);
  24.    printf("Machine gun sound\n");
  25.    mgun();
  26.  
  27.    printf("An ascending glissando\n");
  28.    gliss(100,1000,300);
  29.    printf("A descending glissando\n");
  30.    gliss(3000, 200, 100);
  31.    printf("\n\nEnd of the sound test program!");
  32. }
  33.  
  34.  
  35.  
  36.  
  37.  
  38.